object DMRels: TDMRels
  OldCreateOrder = False
  Height = 288
  Width = 474
  object frxDBDataset1: TfrxDBDataset
    UserName = 'frxDBDataset1'
    CloseDataSource = False
    FieldAliases.Strings = (
      'minutos=minutos'
      'titulo=titulo'
      'projeto=projeto'
      'dt_solicita=dt_solicita'
      'dt_conclusao=dt_conclusao'
      'requisito=requisito'
      'versao=versao'
      'link_video=link_video'
      'video_ajuda=video_ajuda'
      'Limitacao=Limitacao'
      'tempo=tempo')
    DataSet = QrRequisitosConcluidos
    BCDToCurrency = False
    Left = 104
    Top = 24
  end
  object QrRequisitosConcluidos: TZReadOnlyQuery
    Connection = frmPrinc.ZConnection1
    OnCalcFields = QrRequisitosConcluidosCalcFields
    Active = True
    SQL.Strings = (
      'select round(sum(tempo_segundos) / 60) as minutos, r.titulo,'
      
        'p.descricao as projeto, r.dt_solicita, r.dt_conclusao, r.requisi' +
        'to,'
      'r.versao, r.link_video, r.video_ajuda, r.Limitacao'
      'from tab_consumo_tempo t'
      'inner join tab_requisitos r on t.cod_requisito = r.codigo'
      'inner join tab_projetos p on r.cod_projeto = p.codigo'
      'where r.dt_conclusao >= :dt1 and r.dt_conclusao <= :dt2'
      'and (p.codigo = :c1 or p.cod_projeto = :c2)'
      'group by r.codigo')
    Params = <
      item
        DataType = ftUnknown
        Name = 'dt1'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'dt2'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'c1'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'c2'
        ParamType = ptUnknown
      end>
    Left = 48
    Top = 40
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'dt1'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'dt2'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'c1'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'c2'
        ParamType = ptUnknown
      end>
    object QrRequisitosConcluidosminutos: TLargeintField
      FieldName = 'minutos'
      ReadOnly = True
    end
    object QrRequisitosConcluidostitulo: TWideStringField
      FieldName = 'titulo'
      Size = 50
    end
    object QrRequisitosConcluidosprojeto: TWideStringField
      FieldName = 'projeto'
      Size = 50
    end
    object QrRequisitosConcluidosdt_solicita: TDateField
      FieldName = 'dt_solicita'
    end
    object QrRequisitosConcluidosdt_conclusao: TDateField
      FieldName = 'dt_conclusao'
    end
    object QrRequisitosConcluidosrequisito: TWideMemoField
      FieldName = 'requisito'
      BlobType = ftWideMemo
    end
    object QrRequisitosConcluidosversao: TWideStringField
      FieldName = 'versao'
      Size = 50
    end
    object QrRequisitosConcluidoslink_video: TWideStringField
      FieldName = 'link_video'
      Size = 200
    end
    object QrRequisitosConcluidosvideo_ajuda: TWideStringField
      FieldName = 'video_ajuda'
      Size = 200
    end
    object QrRequisitosConcluidosLimitacao: TWideMemoField
      FieldName = 'Limitacao'
      BlobType = ftWideMemo
    end
    object QrRequisitosConcluidostempo: TStringField
      FieldKind = fkCalculated
      FieldName = 'tempo'
      Calculated = True
    end
  end
  object RelRequisitosConcluidos: TfrxReport
    Version = '4.12.13'
    DotMatrixReport = False
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 41407.646726377300000000
    ReportOptions.LastChange = 41415.647369733790000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      ''
      'begin'
      ''
      'end.')
    Left = 104
    Top = 88
    Datasets = <
      item
        DataSet = frxDBDataset1
        DataSetName = 'frxDBDataset1'
      end>
    Variables = <>
    Style = <>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Page1: TfrxReportPage
      PaperWidth = 215.900000000000000000
      PaperHeight = 279.400000000000000000
      PaperSize = 1
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      object ReportTitle1: TfrxReportTitle
        Height = 79.370130000000000000
        Top = 18.897650000000000000
        Width = 740.409927000000000000
        object frxDBDataset1projeto: TfrxMemoView
          Align = baCenter
          Left = 41.385853500000020000
          Top = 7.559059999999999000
          Width = 657.638220000000000000
          Height = 34.015770000000000000
          ShowHint = False
          DataField = 'projeto'
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -21
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."projeto"]')
          ParentFont = False
        end
      end
      object MasterData1: TfrxMasterData
        Height = 139.842610000000000000
        Top = 158.740260000000000000
        Width = 740.409927000000000000
        DataSet = frxDBDataset1
        DataSetName = 'frxDBDataset1'
        RowCount = 0
        object frxDBDataset1titulo: TfrxMemoView
          Left = 646.299630000000000000
          Top = 30.236240000000010000
          Width = 83.149660000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'dt_conclusao'
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Memo.UTF8W = (
            '[frxDBDataset1."dt_conclusao"]')
        end
        object Memo2: TfrxMemoView
          Left = 7.559060000000000000
          Top = 7.559059999999988000
          Width = 721.890230000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'titulo'
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsItalic]
          Memo.UTF8W = (
            '[frxDBDataset1."titulo"]')
          ParentFont = False
        end
        object frxDBDataset1requisito: TfrxMemoView
          Left = 26.456710000000000000
          Top = 30.236240000000010000
          Width = 566.929500000000000000
          Height = 102.047310000000000000
          ShowHint = False
          DataField = 'requisito'
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[frxDBDataset1."requisito"]')
          ParentFont = False
        end
        object frxDBDataset1tempo: TfrxMemoView
          Left = 646.299630000000000000
          Top = 83.149660000000010000
          Width = 83.149660000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'tempo'
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[frxDBDataset1."tempo"]')
          ParentFont = False
        end
        object Memo1: TfrxMemoView
          Left = 646.299630000000000000
          Top = 60.472479999999990000
          Width = 94.488250000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            'Tempo Gasto')
        end
        object Memo3: TfrxMemoView
          Left = 646.299630000000000000
          Top = 7.559059999999988000
          Width = 94.488250000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            'Dt. Conclus'#227'o')
        end
        object Memo4: TfrxMemoView
          Align = baBottom
          Left = 3.779530000000000000
          Top = 120.944960000000000000
          Width = 733.228820000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Frame.Typ = [ftBottom]
          ParentFont = False
        end
      end
      object ReportSummary1: TfrxReportSummary
        Height = 64.252010000000000000
        Top = 359.055350000000000000
        Width = 740.409927000000000000
        object Memo5: TfrxMemoView
          Left = 551.811380000000000000
          Top = 3.779530000000022000
          Width = 26.456710000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[int(SUM(<frxDBDataset1."minutos">)/60)]')
          ParentFont = False
        end
        object Memo6: TfrxMemoView
          Left = 619.842920000000000000
          Top = 3.779530000000022000
          Width = 26.456710000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            
              '[((SUM(<frxDBDataset1."minutos">)) - (INT(SUM(<frxDBDataset1."mi' +
              'nutos">)/60)*60))]')
        end
        object Memo7: TfrxMemoView
          Left = 574.488560000000000000
          Top = 3.779530000000022000
          Width = 15.118120000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            'H')
        end
        object Memo8: TfrxMemoView
          Left = 646.299630000000000000
          Top = 3.779530000000022000
          Width = 37.795275590000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            'Min.')
        end
      end
    end
  end
  object DataSource1: TDataSource
    AutoEdit = False
    DataSet = frmPrinc.tab_projetos
    Left = 48
    Top = 104
  end
  object frxDBDataset2: TfrxDBDataset
    UserName = 'frxDBDataset1'
    CloseDataSource = False
    FieldAliases.Strings = (
      'minutos=minutos'
      'titulo=titulo'
      'projeto=projeto'
      'dt_solicita=dt_solicita'
      'dt_conclusao=dt_conclusao'
      'requisito=requisito'
      'versao=versao'
      'link_video=link_video'
      'video_ajuda=video_ajuda'
      'Limitacao=Limitacao'
      'tempo=tempo'
      'minutos2=minutos2'
      'data=data'
      'codigo=codigo'
      'hora=hora')
    DataSet = QrHorasDetalhadas
    BCDToCurrency = False
    Left = 344
    Top = 32
  end
  object QrHorasDetalhadas: TZReadOnlyQuery
    Connection = frmPrinc.ZConnection1
    SQL.Strings = (
      'select (minutos - (hora * 60)) as minutos2, x.* from '
      '('
      
        'select t.data, r.codigo, truncate(sum(tempo_segundos) / 60,0) as' +
        ' minutos, '
      'truncate(sum(tempo_segundos) / 60 / 60,0) as hora, r.titulo,'
      
        'p.descricao as projeto, r.dt_solicita, r.dt_conclusao, r.requisi' +
        'to,'
      'r.versao, r.link_video, r.video_ajuda, r.Limitacao'
      'from tab_consumo_tempo t'
      'inner join tab_requisitos r on t.cod_requisito = r.codigo'
      'inner join tab_projetos p on r.cod_projeto = p.codigo'
      'where r.codigo = :cod'
      'group by r.codigo, t.data'
      ') as x')
    Params = <
      item
        DataType = ftUnknown
        Name = 'cod'
        ParamType = ptUnknown
      end>
    Left = 288
    Top = 48
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'cod'
        ParamType = ptUnknown
      end>
    object QrHorasDetalhadasminutos2: TLargeintField
      FieldName = 'minutos2'
      ReadOnly = True
    end
    object QrHorasDetalhadasdata: TDateField
      FieldName = 'data'
      ReadOnly = True
    end
    object QrHorasDetalhadascodigo: TLargeintField
      FieldName = 'codigo'
      ReadOnly = True
    end
    object QrHorasDetalhadasminutos: TLargeintField
      FieldName = 'minutos'
      ReadOnly = True
    end
    object QrHorasDetalhadashora: TLargeintField
      FieldName = 'hora'
      ReadOnly = True
    end
    object QrHorasDetalhadastitulo: TWideStringField
      FieldName = 'titulo'
      ReadOnly = True
      Size = 50
    end
    object QrHorasDetalhadasprojeto: TWideStringField
      FieldName = 'projeto'
      ReadOnly = True
      Size = 50
    end
    object QrHorasDetalhadasdt_solicita: TDateField
      FieldName = 'dt_solicita'
      ReadOnly = True
    end
    object QrHorasDetalhadasdt_conclusao: TDateField
      FieldName = 'dt_conclusao'
      ReadOnly = True
    end
    object QrHorasDetalhadasrequisito: TWideMemoField
      FieldName = 'requisito'
      ReadOnly = True
      BlobType = ftWideMemo
    end
    object QrHorasDetalhadasversao: TWideStringField
      FieldName = 'versao'
      ReadOnly = True
      Size = 50
    end
    object QrHorasDetalhadaslink_video: TWideStringField
      FieldName = 'link_video'
      ReadOnly = True
      Size = 200
    end
    object QrHorasDetalhadasvideo_ajuda: TWideStringField
      FieldName = 'video_ajuda'
      ReadOnly = True
      Size = 200
    end
    object QrHorasDetalhadasLimitacao: TWideMemoField
      FieldName = 'Limitacao'
      ReadOnly = True
      BlobType = ftWideMemo
    end
    object QrHorasDetalhadasTempo: TStringField
      FieldKind = fkCalculated
      FieldName = 'Tempo'
      Calculated = True
    end
  end
  object RelHrsDet: TfrxReport
    Version = '4.12.13'
    DotMatrixReport = False
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 41407.646726377300000000
    ReportOptions.LastChange = 41407.856649513890000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      ''
      'begin'
      ''
      'end.')
    Left = 344
    Top = 96
    Datasets = <
      item
        DataSet = frxDBDataset2
        DataSetName = 'frxDBDataset1'
      end>
    Variables = <>
    Style = <>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Page1: TfrxReportPage
      PaperWidth = 215.900000000000000000
      PaperHeight = 279.400000000000000000
      PaperSize = 1
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      object ReportTitle1: TfrxReportTitle
        Height = 241.889920000000000000
        Top = 18.897650000000000000
        Width = 740.409927000000000000
        object Memo2: TfrxMemoView
          Left = 7.559060000000000000
          Top = 71.811070000000000000
          Width = 721.890230000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'titulo'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset1'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsItalic]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."titulo"]')
          ParentFont = False
        end
        object frxDBDataset1requisito: TfrxMemoView
          Left = 7.559060000000000000
          Top = 158.740260000000000000
          Width = 721.890230000000000000
          Height = 75.590600000000000000
          ShowHint = False
          DataField = 'requisito'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset1'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[frxDBDataset1."requisito"]')
          ParentFont = False
        end
        object frxDBDataset1titulo: TfrxMemoView
          Left = 7.559060000000000000
          Top = 132.283550000000000000
          Width = 83.149660000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'dt_conclusao'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset1'
          Memo.UTF8W = (
            '[frxDBDataset1."dt_conclusao"]')
        end
        object frxDBDataset1tempo: TfrxMemoView
          Left = 120.944960000000000000
          Top = 132.283550000000000000
          Width = 83.149660000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'tempo'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset1'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[frxDBDataset1."tempo"]')
          ParentFont = False
        end
        object Memo1: TfrxMemoView
          Left = 120.944960000000000000
          Top = 109.606370000000000000
          Width = 136.063080000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            'Tempo Total Gasto')
        end
        object Memo3: TfrxMemoView
          Left = 7.559060000000000000
          Top = 109.606370000000000000
          Width = 94.488250000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            'Dt. Conclus'#227'o')
        end
        object frxDBDataset1projeto: TfrxMemoView
          Left = 7.559060000000000000
          Width = 721.890230000000000000
          Height = 30.236240000000000000
          ShowHint = False
          DataField = 'projeto'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset1'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -24
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8W = (
            '[frxDBDataset1."projeto"]')
          ParentFont = False
        end
        object Memo7: TfrxMemoView
          Left = 7.559060000000000000
          Top = 30.236239999999990000
          Width = 721.890230000000000000
          Height = 30.236240000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -24
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8W = (
            'Relat'#243'rio de Tempo Gasto')
          ParentFont = False
        end
        object Memo6: TfrxMemoView
          Align = baBottom
          Top = 222.992270000000000000
          Width = 740.787880000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Frame.Typ = [ftBottom]
          Memo.UTF8W = (
            ' ')
        end
      end
      object MasterData1: TfrxMasterData
        Height = 26.456710000000000000
        Top = 321.260050000000000000
        Width = 740.409927000000000000
        DataSet = frxDBDataset2
        DataSetName = 'frxDBDataset1'
        RowCount = 0
        object frxDBDataset1data: TfrxMemoView
          Left = 75.590600000000000000
          Top = 3.779530000000022000
          Width = 109.606370000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'data'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset1'
          Memo.UTF8W = (
            '[frxDBDataset1."data"]')
        end
        object frxDBDataset1hora: TfrxMemoView
          Left = 196.535560000000000000
          Top = 3.779530000000022000
          Width = 18.897650000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'hora'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset1'
          Memo.UTF8W = (
            '[frxDBDataset1."hora"]')
        end
        object frxDBDataset1minutos2: TfrxMemoView
          Left = 272.126160000000000000
          Top = 3.779530000000022000
          Width = 18.897650000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'minutos2'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset1'
          Memo.UTF8W = (
            '[frxDBDataset1."minutos2"]')
        end
        object Memo4: TfrxMemoView
          Left = 219.212740000000000000
          Top = 3.779530000000022000
          Width = 15.118120000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            'h')
        end
        object Memo5: TfrxMemoView
          Left = 294.803340000000000000
          Top = 3.779530000000022000
          Width = 26.456710000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            'm')
        end
      end
      object ReportSummary1: TfrxReportSummary
        Height = 34.015770000000010000
        Top = 408.189240000000000000
        Width = 740.409927000000000000
        object Memo8: TfrxMemoView
          Left = 196.535560000000000000
          Top = 12.779530000000020000
          Width = 94.488250000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            '[SUM(<frxDBDataset1."hora">)]')
        end
        object Memo9: TfrxMemoView
          Left = 272.126160000000000000
          Top = 12.779530000000020000
          Width = 94.488250000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8W = (
            '[SUM(<frxDBDataset1."minutos2">)]')
        end
        object Memo10: TfrxMemoView
          Width = 740.787880000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
      end
    end
  end
  object DataSource2: TDataSource
    AutoEdit = False
    DataSet = frmPrinc.tab_projetos
    Left = 288
    Top = 112
  end
end
